/**
 * \addtogroup httpd
 * @{
 */

/**
 * \file
 * HTTP server read-only file system code.
 * \author Adam Dunkels <adam@dunkels.com>
 *
 * A simple read-only filesystem. 
 */
 
/*
 * Copyright (c) 2001, Swedish Institute of Computer Science.
 * All rights reserved. 
 *
 * Redistribution and use in source and binary forms, with or without 
 * modification, are permitted provided that the following conditions 
 * are met: 
 * 1. Redistributions of source code must retain the above copyright 
 *    notice, this list of conditions and the following disclaimer. 
 * 2. Redistributions in binary form must reproduce the above copyright 
 *    notice, this list of conditions and the following disclaimer in the 
 *    documentation and/or other materials provided with the distribution. 
 * 3. Neither the name of the Institute nor the names of its contributors 
 *    may be used to endorse or promote products derived from this software 
 *    without specific prior written permission. 
 *
 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND 
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE 
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 
 * SUCH DAMAGE. 
 *
 * This file is part of the lwIP TCP/IP stack.
 * 
 * Author: Adam Dunkels <adam@sics.se>
 *
 * $Id: fs.c,v 1.7.2.3 2003/10/07 13:22:27 adam Exp $
 */

#include "uip.h"
#include "httpd.h"
#include "fs.h"
#include "fsdata.h"

#include "fsdata.c"

#ifdef FS_STATISTICS
#if FS_STATISTICS == 1
static u16_t count[FS_NUMFILES];
#endif /* FS_STATISTICS */
#endif /* FS_STATISTICS */

/*-----------------------------------------------------------------------------------*/
static u8_t
fs_strcmp(const char *str1, const char *str2)
{
  u8_t i;
  i = 0;
 loop:

  if(str2[i] == 0 ||
     str1[i] == '\r' || 
     str1[i] == '\n') {
    return 0;
  }

  if(str1[i] != str2[i]) {
    return 1;
  }


  ++i;
  goto loop;
}

#define BYTE_PER_STR 32

/**
 *  Print buffer content in hex and char formats grouped in columns by 8 bytes. Example:
 *     HH HH HH HH HH HH HH HH  HH HH HH HH HH HH HH HH   CCCCCCCC CCCCCCCC
 *  Number bytes per line defined in BYTE_PER_STR
 *
 *  \param[in] buf_in - pointer to buffer.
 *  \param[in] len - buffer length (in bytes).
 *  \param[in] namestr - name of buffer.
 *  \return
 *        none
 */
void printbuf(void * buf_in, size_t len, char *namestr)
{
    char str[BYTE_PER_STR * 4], ch;
    char hexstr[BYTE_PER_STR * 4];
    char *buf = (char *)buf_in;
    int  char_n = 0, i_hs = 0, i_l = 0;
    int i, i_sp;

    if (namestr == NULL)
        namestr="";
    printf("%s:%p (%02d/0x%02x bytes)\n", namestr, buf_in, len, len);
    for (i = 0, i_sp = 0; i < len; i++) {
        ch = (char)buf[i];
        i_hs += sprintf(&(hexstr[i_hs]), "%02x ", ch);
        if ((ch < 0x20) || (ch > 0x7f))
            ch = '?';
        str[char_n++] = ch;
        i_l++;
        i_sp++;
        if (i_l >= BYTE_PER_STR) {
            str[char_n] = '\0';
            hexstr[i_hs] = '\0';
            printf("%s  %s\n", hexstr, str);
            char_n = 0;
            i_hs = 0;
            i_l = 0;
            i_sp = 0;
        } else if (i_sp >= 8) {
            str[char_n++] = ' ';
            hexstr[i_hs++] = ' ';
            i_sp = 0;
        }
    }
    if (char_n != 0) {
        str[char_n] = '\0';
        hexstr[i_hs] = '\0';
        printf("%s%*c  %s\n", hexstr, ((BYTE_PER_STR - i_l)*3 + (BYTE_PER_STR - i_l)/8), ' ', str);
    }
}

/*-----------------------------------------------------------------------------------*/
int
fs_open(const char *name, struct fs_file *file)
{
#ifdef FS_STATISTICS
#if FS_STATISTICS == 1
  u16_t i = 0;
#endif /* FS_STATISTICS */
#endif /* FS_STATISTICS */
  struct fsdata_file_noconst *f;
//	printbuf(name, 100, "name");
//	printbuf(file_404_html, 300, "file_404_html");

//getc();
//printf("fs_open: %s\n",name);
//getc();
  for(f = (struct fsdata_file_noconst *)FS_ROOT;
      f != NULL;
      f = (struct fsdata_file_noconst *)f->next) {
//printf("%s\n",f->name);
//getc();
    if(fs_strcmp(name, f->name) == 0) {
//    	printf("found!\n");
//    	getc();
      file->data = f->data;
      file->len = f->len;
#ifdef FS_STATISTICS
#if FS_STATISTICS == 1
      ++count[i];
#endif /* FS_STATISTICS */
#endif /* FS_STATISTICS */
      return 1;
    }
#ifdef FS_STATISTICS
#if FS_STATISTICS == 1
    ++i;
#endif /* FS_STATISTICS */
#endif /* FS_STATISTICS */

  }
  return 0;
}
/*-----------------------------------------------------------------------------------*/
void
fs_init(void)
{
#ifdef FS_STATISTICS
#if FS_STATISTICS == 1
  u16_t i;
  for(i = 0; i < FS_NUMFILES; i++) {
    count[i] = 0;
  }
#endif /* FS_STATISTICS */
#endif /* FS_STATISTICS */
}
/*-----------------------------------------------------------------------------------*/
#ifdef FS_STATISTICS
#if FS_STATISTICS == 1  
u16_t fs_count
(char *name)
{
  struct fsdata_file_noconst *f;
  u16_t i;

  i = 0;
  for(f = (struct fsdata_file_noconst *)FS_ROOT;
      f != NULL;
      f = (struct fsdata_file_noconst *)f->next) {

    if(fs_strcmp(name, f->name) == 0) {
      return count[i];
    }
    ++i;
  }
  return 0;
}
#endif /* FS_STATISTICS */
#endif /* FS_STATISTICS */
/*-----------------------------------------------------------------------------------*/
